home *** CD-ROM | disk | FTP | other *** search
/ Fantastic Women / Fantastic Women.iso / mac / TITLE.DIR / 00017_Script_17 < prev    next >
Text File  |  1994-11-17  |  4KB  |  227 lines

  1. on butexit
  2.   
  3.   puppetsound "ENDSHOW.WAV"
  4.   updateStage
  5.   repeat while soundbusy(1)
  6.   end repeat
  7.   quit
  8.   
  9. end butexit
  10.  
  11. on butcred
  12.   
  13.   puppetsound "CRED.AIF"
  14.   updateStage
  15.   repeat while soundbusy(1)
  16.   end repeat
  17.   go to movie "credits.dir"
  18. end butcred
  19.  
  20. on butad
  21.   puppetsound "ADBUT.WAV"
  22.   updateStage
  23.   repeat while soundbusy(1)
  24.     
  25.   end repeat
  26.   fin
  27.   
  28.   go to movie "future"
  29.   
  30. end butad
  31.  
  32.  
  33. on butdoor
  34.   puppetsound "BIGDOOR2.WAV"
  35.   updateStage
  36.   repeat while soundbusy(1)
  37.     
  38.   end repeat
  39.   fin
  40.   
  41.   play movie "cabin" 
  42.   
  43. end butdoor
  44.  
  45.  
  46. -- pressing and moving over the buttons
  47.  
  48. on FlashRoller whichchannel, scriptToExecute, reddencast
  49.   
  50.   set myCast = the mouseCast
  51.   set flag = 0
  52.   -- highlight the button when mouse is over it
  53.   -- must add check to prevent nothing shown
  54.   set the castNum of sprite whichchannel = reddencast
  55.   updateStage
  56.   
  57.   repeat while rollover(whichchannel)
  58.     
  59.     if the mouseDown then
  60.       -- set the castNum of sprite whichchannel = mycast
  61.       set the castNum of sprite whichchannel = reddencast-1
  62.       -- set an inverted ink effect when button pressed
  63.       set the ink of sprite whichChannel to 4
  64.       updateStage
  65.       
  66.       repeat while the mouseDown
  67.         
  68.         if not rollover(whichChannel) then 
  69.           exit repeat
  70.         end if
  71.       end repeat
  72.       
  73.       
  74.       if rollover (whichChannel) then 
  75.         set flag = 1
  76.         exit repeat
  77.         
  78.       end if
  79.       
  80.       
  81.     end if
  82.   end repeat
  83.   -- reset to original button
  84.   set the castNum of sprite whichChannel = reddencast-1
  85.   -- reset original copy ink effect
  86.   set the ink of sprite whichChannel to 0
  87.   updateStage
  88.   if flag then do scriptToExecute
  89.   
  90. end FlashRoller
  91.  
  92.  
  93.  
  94. -- checks all of the screen buttons and carries out appropriate action
  95. on butcheck
  96.   -- deactivate movie button
  97.   if the castNum of sprite(16) <> F54 then
  98.     set the castNum of sprite(16) = F54
  99.     updateStage
  100.   end if
  101.   -- check forward button
  102.   if rollover(18) then
  103.     FlashRoller (18,"but" &RETURN& "go to marker(+1)",G55)
  104.   end if
  105.   -- check backward button
  106.   if rollover(17) then
  107.     FlashRoller (17,"but" &RETURN& "go to marker(-1)",G52)
  108.   end if
  109.   -- go back to title
  110.   if rollover(13) then
  111.     flashroller(13, "contents", 434)
  112.   end if
  113.   -- tat button
  114.   if rollover(20) then
  115.     flashroller(20, "tat" , F82)
  116.   end if
  117.   -- pc button
  118.   if rollover(23) then
  119.     flashroller(23, " res" , G15)
  120.   end if
  121.   -- cl button
  122.   if rollover(22) then
  123.     flashroller(22, "cl", G12)
  124.   end if
  125.   --ft button
  126.   if rollover(24) then
  127.     flashroller(24, "ft" , G22)
  128.   end if
  129.   -- book button
  130.   if rollover(14) then
  131.     flashroller(14, "book", G35)
  132.   end if
  133.   -- mag button
  134.   if rollover(15) then
  135.     flashroller(15, "mag" , G32)
  136.   end if
  137.   
  138.   
  139.   
  140.   go to marker(0)
  141.   
  142. end butcheck
  143.  
  144.  
  145. -- as above but activates the movie icon and button
  146.  
  147.  
  148.  
  149. on contents
  150.   puppetsound "BUTTON4.AIF"
  151.   updateStage
  152.   fin
  153.   
  154.   go to "return"
  155.   
  156. end contents
  157.  
  158. on but
  159.   puppetsound "BUTTNOIS.AIF"
  160.   updateStage
  161. end but
  162.  
  163.  
  164.  
  165. on book
  166.   puppetsound "BOOKST.AIF"
  167.   updateStage
  168.   go to movie "book.dir"
  169. end book
  170.  
  171. on mag
  172.   puppetsound "BUTTON1.AIF"
  173.   updateStage
  174.   go to movie "mag.dir"
  175. end mag
  176.  
  177. on title
  178.   puppetsound "BUTTON4.AIF"
  179.   updateStage
  180.   go to movie "title.dir"
  181. end title
  182.  
  183. on res
  184.   puppetsound  "FINRES.AIF"
  185.   updateStage
  186.   go to movie "res.dir"
  187. end res
  188.  
  189. on cl
  190.   puppetsound  "FINALZIP.AIF"
  191.   updateStage
  192.   go to movie "cl.dir"
  193. end cl
  194.  
  195. on pc
  196.   puppetsound  "FINPIERC.WAV"
  197.   updateStage
  198.   go to movie "pc.dir"
  199. end pc
  200.  
  201. on ft
  202.   puppetsound  "FINSTILE.AIF"
  203.   updateStage
  204.   go to movie  "ft.dir"
  205. end ft
  206.  
  207. on tat
  208.   puppetsound "FINTAT.AIF"
  209.   updateStage
  210.   go to movie "tat.dir"
  211. end tat
  212.  
  213.  
  214.  
  215.  
  216.  
  217.  
  218.  
  219.  
  220.  
  221.  
  222.  
  223.  
  224.  
  225.  
  226.  
  227.